/ Chip 2002 May / 05_02.iso / macos / net / files / Snak 4.8.2 For OS X.sit / Snak 4.8.2 / UserScripts / OnJoin

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 06 4f 6e 4a 6f 69 6e | 00 00 00 00 00 00 00 00 |..OnJoin|........|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 52 2a 63 | 68 01 00 00 00 00 00 00 |.TEXTR*c|h.......|
|00000050| 00 00 00 00 00 06 76 00 | 00 01 9a b5 29 1c fe b5 |......v.|....)...|
|00000060| 29 1c fe 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |).......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 a4 c8 00 00 |........|........|
|00000080| 23 20 4c 69 6e 65 73 20 | 77 69 74 68 20 27 23 27 |# Lines |with '#'|
|00000090| 20 61 72 65 20 63 6f 6d | 6d 65 6e 74 73 20 74 68 | are com|ments th|
|000000a0| 61 74 20 61 72 65 20 6e | 6f 74 20 65 78 65 63 75 |at are n|ot execu|
|000000b0| 74 65 64 0d 0d 23 20 54 | 68 69 73 20 66 69 6c 65 |ted..# T|his file|
|000000c0| 20 63 6f 6e 74 61 69 6e | 73 20 61 6e 20 65 78 61 | contain|s an exa|
|000000d0| 6d 70 6c 65 20 6f 66 20 | 61 6e 20 22 61 75 74 6f |mple of |an "auto|
|000000e0| 20 67 72 65 65 74 22 20 | 66 75 6e 63 74 69 6f 6e | greet" |function|
|000000f0| 2e 0d 23 20 57 68 65 6e | 65 76 65 72 20 73 6f 6d |..# When|ever som|
|00000100| 65 6f 6e 65 20 6a 6f 69 | 6e 73 20 74 68 65 20 63 |eone joi|ns the c|
|00000110| 68 61 6e 6e 65 6c 20 74 | 68 61 74 20 79 6f 75 20 |hannel t|hat you |
|00000120| 73 70 65 63 69 66 79 20 | 69 6e 20 74 68 65 20 67 |specify |in the g|
|00000130| 72 65 65 74 63 68 61 6e | 6e 65 6c 20 0d 23 20 76 |reetchan|nel .# v|
|00000140| 61 72 69 61 62 6c 65 2c | 20 74 68 65 20 73 63 72 |ariable,| the scr|
|00000150| 69 70 74 20 77 69 6c 6c | 20 73 61 79 20 22 57 65 |ipt will| say "We|
|00000160| 6c 63 6f 6d 65 20 74 6f | 20 3c 63 68 61 6e 6e 65 |lcome to| <channe|
|00000170| 6c 3e 20 3c 6e 69 63 6b | 3e 22 0d 0d 23 20 54 68 |l> <nick|>"..# Th|
|00000180| 69 73 20 69 73 20 61 63 | 74 75 61 6c 6c 79 20 66 |is is ac|tually f|
|00000190| 61 69 72 6c 79 20 6f 62 | 6e 6f 78 69 6f 75 73 2e |airly ob|noxious.|
|000001a0| 20 4d 6f 73 74 20 70 65 | 6f 70 6c 65 20 64 69 73 | Most pe|ople dis|
|000001b0| 70 72 6f 76 65 20 6f 66 | 20 61 75 74 6f 20 67 72 |prove of| auto gr|
|000001c0| 65 65 74 73 0d 23 20 61 | 6e 64 20 69 74 20 69 73 |eets.# a|nd it is|
|000001d0| 20 6f 6e 6c 79 20 69 6e | 63 6c 75 64 65 64 20 68 | only in|cluded h|
|000001e0| 65 72 65 20 61 73 20 61 | 6e 20 65 78 61 6d 70 6c |ere as a|n exampl|
|000001f0| 65 0d 0d 23 20 54 6f 20 | 61 75 74 6f 6d 61 74 69 |e..# To |automati|
|00000200| 63 61 6c 6c 79 20 6c 6f | 61 64 20 74 68 69 73 20 |cally lo|ad this |
|00000210| 69 6e 74 6f 20 61 20 63 | 6f 6e 6e 65 63 74 69 6f |into a c|onnectio|
|00000220| 6e 2c 20 61 64 64 20 22 | 2f 6c 6f 61 64 20 4f 6e |n, add "|/load On|
|00000230| 4a 6f 69 6e 22 20 74 6f | 20 74 68 65 20 73 74 61 |Join" to| the sta|
|00000240| 72 74 75 70 20 61 63 74 | 69 6f 6e 73 2e 0d 0d 0d |rtup act|ions....|
|00000250| 23 20 54 68 69 73 20 6c | 69 6e 65 20 63 72 65 61 |# This l|ine crea|
|00000260| 74 65 73 20 61 20 76 61 | 72 69 61 62 6c 65 20 74 |tes a va|riable t|
|00000270| 68 61 74 20 68 6f 6c 64 | 73 20 74 68 65 20 6e 61 |hat hold|s the na|
|00000280| 6d 65 20 6f 66 20 74 68 | 65 20 63 68 61 6e 6e 65 |me of th|e channe|
|00000290| 6c 0d 23 20 74 68 61 74 | 20 74 68 65 20 66 75 6e |l.# that| the fun|
|000002a0| 63 74 69 6f 6e 20 6f 70 | 65 72 61 74 65 73 20 6f |ction op|erates o|
|000002b0| 6e 2e 0d 0d 61 73 73 69 | 67 6e 20 67 72 65 65 74 |n...assi|gn greet|
|000002c0| 63 68 61 6e 6e 65 6c 20 | 23 63 68 61 74 7a 6f 6e |channel |#chatzon|
|000002d0| 65 0d 0d 0d 23 20 54 68 | 65 20 6e 65 78 74 20 70 |e...# Th|e next p|
|000002e0| 61 72 74 20 69 73 20 74 | 68 65 20 61 63 74 75 61 |art is t|he actua|
|000002f0| 6c 20 65 76 65 6e 74 20 | 68 61 6e 64 6c 65 72 20 |l event |handler |
|00000300| 73 63 72 69 70 74 2e 20 | 53 6e 61 6b 20 63 61 6c |script. |Snak cal|
|00000310| 6c 73 20 74 68 65 20 68 | 61 6e 64 6c 65 72 0d 23 |ls the h|andler.#|
|00000320| 20 20 77 68 65 6e 20 73 | 6f 6d 65 6f 6e 65 20 6a |  when s|omeone j|
|00000330| 6f 69 6e 73 20 61 6e 79 | 20 63 68 61 6e 6e 65 6c |oins any| channel|
|00000340| 20 74 68 61 74 20 79 6f | 75 20 61 72 65 20 61 20 | that yo|u are a |
|00000350| 6d 65 6d 62 65 72 20 6f | 66 2e 0d 0d 23 20 49 6e |member o|f...# In|
|00000360| 70 75 74 3a 0d 23 20 24 | 30 20 3a 20 6e 69 63 6b |put:.# $|0 : nick|
|00000370| 21 75 73 65 72 68 6f 73 | 74 0d 23 20 24 31 20 3a |!userhos|t.# $1 :|
|00000380| 20 63 68 61 6e 6e 65 6c | 20 6e 61 6d 65 0d 0d 23 | channel| name..#|
|00000390| 20 46 69 72 73 74 20 74 | 68 65 20 73 63 72 69 70 | First t|he scrip|
|000003a0| 74 20 74 65 73 74 73 20 | 69 66 20 74 68 65 20 63 |t tests |if the c|
|000003b0| 68 61 6e 6e 65 6c 20 6e | 61 6d 65 20 69 73 20 74 |hannel n|ame is t|
|000003c0| 68 65 20 6f 6e 65 20 69 | 74 20 73 68 6f 75 6c 64 |he one i|t should|
|000003d0| 20 72 65 61 63 74 20 74 | 6f 2e 0d 23 20 74 68 65 | react t|o..# the|
|000003e0| 6e 20 69 74 20 66 6f 72 | 6d 61 74 73 20 61 20 6d |n it for|mats a m|
|000003f0| 65 73 73 61 67 65 20 74 | 68 61 74 20 69 73 20 73 |essage t|hat is s|
|00000400| 65 6e 74 20 74 6f 20 74 | 68 65 20 63 68 61 6e 6e |ent to t|he chann|
|00000410| 65 6c 2c 20 77 65 6c 63 | 6f 6d 69 6e 67 20 74 68 |el, welc|oming th|
|00000420| 65 20 6e 65 77 20 75 73 | 65 72 2e 0d 0d 23 20 49 |e new us|er...# I|
|00000430| 6e 20 6f 72 64 65 72 20 | 66 6f 72 20 79 6f 75 20 |n order |for you |
|00000440| 74 6f 20 73 65 65 20 77 | 68 61 74 20 69 74 20 64 |to see w|hat it d|
|00000450| 6f 65 73 20 69 74 20 61 | 6c 73 6f 20 77 72 69 74 |oes it a|lso writ|
|00000460| 65 73 20 74 68 65 20 6d | 65 73 73 61 67 65 20 74 |es the m|essage t|
|00000470| 6f 20 74 68 65 20 77 69 | 6e 64 6f 77 0d 0d 6f 6e |o the wi|ndow..on|
|00000480| 20 2d 6a 6f 69 6e 20 2a | 20 7b 0d 09 69 66 20 28 | -join *| {..if (|
|00000490| 5b 24 31 5d 20 3d 3d 20 | 5b 24 67 72 65 65 74 63 |[$1] == |[$greetc|
|000004a0| 68 61 6e 6e 65 6c 5d 29 | 0d 09 7b 0d 09 09 71 75 |hannel])|..{...qu|
|000004b0| 6f 74 65 20 50 52 49 56 | 4d 53 47 20 24 31 20 3a |ote PRIV|MSG $1 :|
|000004c0| 57 65 6c 63 6f 6d 65 20 | 74 6f 20 24 31 20 24 6e |Welcome |to $1 $n|
|000004d0| 69 63 6b 6f 6e 6c 79 28 | 24 30 29 0d 09 09 65 63 |ickonly(|$0)...ec|
|000004e0| 68 6f 20 57 65 6c 63 6f | 6d 65 20 74 6f 20 24 31 |ho Welco|me to $1|
|000004f0| 20 24 6e 69 63 6b 6f 6e | 6c 79 28 24 30 29 0d 09 | $nickon|ly($0)..|
|00000500| 7d 0d 7d 0d 0d 23 20 54 | 68 65 20 63 68 61 72 61 |}.}..# T|he chara|
|00000510| 63 74 65 72 20 69 6e 20 | 66 72 6f 6e 74 20 6f 66 |cter in |front of|
|00000520| 20 74 68 65 20 6a 6f 69 | 6e 20 64 65 74 65 72 6d | the joi|n determ|
|00000530| 69 6e 65 73 20 68 6f 77 | 20 53 6e 61 6b 20 63 6f |ines how| Snak co|
|00000540| 6e 74 69 6e 75 65 73 20 | 70 72 6f 63 65 73 73 69 |ntinues |processi|
|00000550| 6e 67 2e 0d 23 20 41 20 | 27 5e 27 20 73 74 6f 70 |ng..# A |'^' stop|
|00000560| 73 20 66 75 72 74 68 65 | 72 20 70 72 6f 63 65 73 |s furthe|r proces|
|00000570| 73 69 6e 67 20 6f 66 20 | 74 68 65 20 65 76 65 6e |sing of |the even|
|00000580| 74 2e 0d 23 20 41 20 27 | 2d 27 20 6c 65 74 73 20 |t..# A '|-' lets |
|00000590| 53 6e 61 6b 20 63 6f 6e | 74 69 6e 75 65 20 70 72 |Snak con|tinue pr|
|000005a0| 6f 63 65 73 73 69 6e 67 | 2e 20 54 68 69 73 20 77 |ocessing|. This w|
|000005b0| 69 6c 6c 20 63 61 75 73 | 65 20 74 68 65 20 6e 6f |ill caus|e the no|
|000005c0| 72 6d 61 6c 20 6a 6f 69 | 6e 0d 23 20 6d 65 73 73 |rmal joi|n.# mess|
|000005d0| 61 67 65 20 74 6f 20 61 | 70 70 65 61 72 3a 20 22 |age to a|ppear: "|
|000005e0| 3c 6e 69 63 6b 3e 20 68 | 61 73 20 6a 6f 69 6e 65 |<nick> h|as joine|
|000005f0| 64 20 74 68 65 20 63 68 | 61 6e 6e 65 6c 22 2e 0d |d the ch|annel"..|
|00000600| 0d 23 20 54 68 69 73 20 | 73 63 72 69 70 74 20 75 |.# This |script u|
|00000610| 73 65 73 20 74 68 65 20 | 24 6e 69 63 6b 6f 6e 6c |ses the |$nickonl|
|00000620| 79 20 66 75 6e 63 74 69 | 6f 6e 20 66 72 6f 6d 20 |y functi|on from |
|00000630| 74 68 65 20 42 61 73 69 | 63 61 6c 20 73 63 72 69 |the Basi|cal scri|
|00000640| 70 74 20 66 69 6c 65 2e | 0d 23 20 54 68 65 20 66 |pt file.|.# The f|
|00000650| 75 6e 63 74 69 6f 6e 20 | 73 70 6c 69 74 73 20 74 |unction |splits t|
|00000660| 68 65 20 6e 69 63 6b 21 | 75 73 65 72 68 6f 73 74 |he nick!|userhost|
|00000670| 20 73 74 72 69 6e 67 20 | 61 6e 64 20 72 65 74 75 | string |and retu|
|00000680| 72 6e 73 20 74 68 65 20 | 6e 69 63 6b 2e 0d 0d 23 |rns the |nick...#|
|00000690| 20 54 68 65 20 65 63 68 | 6f 20 66 75 6e 63 74 69 | The ech|o functi|
|000006a0| 6f 6e 20 77 69 6c 6c 20 | 64 69 73 70 6c 61 79 20 |on will |display |
|000006b0| 74 68 65 20 74 65 78 74 | 20 6c 6f 63 61 6c 6c 79 |the text| locally|
|000006c0| 0d 23 20 54 68 65 20 73 | 61 79 20 66 75 6e 63 74 |.# The s|ay funct|
|000006d0| 69 6f 6e 20 77 69 6c 6c | 20 73 65 6e 64 20 74 68 |ion will| send th|
|000006e0| 65 20 74 65 78 74 20 74 | 6f 20 74 68 65 20 63 68 |e text t|o the ch|
|000006f0| 61 6e 6e 65 6c 0d 00 00 | 00 00 00 00 00 00 00 00 |annel...|........|
|00000700| 00 00 01 00 00 00 01 54 | 00 00 00 54 00 00 00 46 |.......T|...T...F|
|00000710| 00 01 00 00 91 4c 00 00 | 00 15 84 bf c0 03 00 00 |.....L..|........|
|00000720| fb 99 5e 9a a8 ff 00 00 | 00 00 00 91 4d 00 00 00 |..^.....|....M...|
|00000730| 05 61 6c 69 61 73 02 00 | 00 00 54 45 58 54 52 2a |.alias..|..TEXTR*|
|00000740| 63 68 01 00 ff ff ff ff | 00 00 00 00 2f 32 00 00 |ch......|..../2..|
|00000750| 00 00 54 45 58 54 52 2a | 63 68 01 00 ff ff ff ff |..TEXTR*|ch......|
|00000760| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000770| 00 00 aa 60 47 5b 00 00 | 03 cd 00 00 01 9a 83 2c |...`G[..|.......,|
|00000780| c0 03 00 00 fb c0 00 00 | 50 86 c0 00 00 77 ab ff |........|P....w..|
|00000790| 00 00 00 00 00 91 51 00 | 00 00 1b 86 5f c0 03 00 |......Q.|...._...|
|000007a0| 00 fb c0 00 00 77 ad c0 | 00 00 7f 06 ff 00 00 00 |.....w..|........|
|000007b0| 00 00 91 52 00 00 00 1b | 82 af c0 03 00 00 fb c0 |...R....|........|
|000007c0| 00 00 7f 1e c0 00 00 86 | 12 ff 00 00 00 00 00 91 |........|........|
|000007d0| 53 00 00 00 1b 81 2a c0 | 03 00 00 fb c0 00 00 86 |S.....*.|........|
|000007e0| 30 c0 00 00 98 ca ff 00 | 00 00 00 00 91 54 00 00 |0.......|.....T..|
|000007f0| 00 1b 88 ff c0 03 00 00 | fb c0 00 00 98 cc c0 00 |........|........|
|00000800| 00 00 00 04 00 01 00 01 | 00 00 00 48 00 09 4d 6f |........|...H..Mo|
|00000810| 6e 61 63 6f 00 9d a1 d0 | 00 00 00 26 00 00 00 3a |naco....|...&...:|
|00000820| 2b c6 03 00 05 a6 d8 e4 | 05 9c f8 de 05 9d 00 06 |+.......|........|
|00000830| 00 04 00 b8 00 31 03 56 | 02 87 00 b8 00 31 03 56 |.....1.V|.....1.V|
|00000840| 02 87 b5 28 d6 ae 00 00 | 01 bd 00 00 01 bd 00 00 |...(....|........|
|00000850| 00 00 01 00 00 00 01 00 | 00 00 01 54 00 00 00 54 |........|...T...T|
|00000860| 00 00 00 46 05 9d a3 2c | 3b 20 00 00 00 1c 00 46 |...F...,|; .....F|
|00000870| 00 01 4d 57 42 42 00 00 | 00 12 4d 50 53 52 00 00 |..MWBB..|..MPSR..|
|00000880| 00 1e 03 f0 ff ff 00 00 | 00 00 00 00 00 00 03 ed |........|........|
|00000890| ff ff 00 00 00 08 05 9d | a1 10 00 00 00 00 00 00 |........|........|
|000008a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+